home *** CD-ROM | disk | FTP | other *** search
/ Totally AMOS / Totally AMOS - Issue 1 (1991-11)(Tucker, Len - Tucker, Anne).adf / source_progs / Show_Fonts.AMOS / Show_Fonts.amosSourceCode
AMOS Source Code  |  1991-09-22  |  1KB  |  35 lines
  1. Screen Open 1,640,240,16,Hires
  2. Gr Writing 0
  3. Get Disc Fonts 
  4. P=20
  5. Repeat 
  6. Add Z,1
  7. A$=Font$(Z)
  8. Locate 1,Z*2
  9. Print A$
  10. Set Font 1
  11. Text 120,P,Mid$(A$,1,29)
  12. Add P,17
  13. Until Z=4
  14. Print : Print "Press any Lettered Key"
  15. Wait Key 
  16. Cls 
  17. Print "HOW TO DO IT"
  18. Print "1) Use workbench to delete Dir's & Files from the COPY of  Amos Program Disc"
  19. Print "2) Activate the Shell-cd df1:(Return)"
  20. Print "3) delete manual all(Return)"
  21. Print "4) delete Config1_2.amos(Return)"
  22. Print "5) make dir fonts(Return)"
  23. Print "6) cd df0:(Return)"
  24. Print "7) copy from df0:fonts all to df1:fonts(Return)"
  25. Print "8) More space can be made by deleting any program ending in .Amos"
  26. Print "   From your COPY of the Amos program disc"
  27. Print "9) end cli(Return)"
  28. Print "10) Re boot your new disc & then type:-"
  29. Print "11) get disc files(Return)"
  30. Print "12) set font (to the number you want)-Return"
  31. Print "13) Text 20,20,TEST (Return) The word TEST must be in inverted commas  "
  32. Print "14) The numbers 20,20 position the text on the screen-try some others"
  33. Print "15) Numbers after the graphic text to be inserted with Set Font(number)"
  34. Print "The other nos.refer to height etc."
  35. Print " And thats about it.-ink may be used for a colour"